inherited Compra: TCompra
  Caption = 'Compra'
  PixelsPerInch = 96
  TextHeight = 13
end
